home *** CD-ROM | disk | FTP | other *** search
/ TPUG - Toronto PET Users Group / TPUG Users Group CD / TPUG Users Group CD.iso / NEW / J-Jim Butterfield / (n)j1.d64 / trap (.txt) < prev    next >
Commodore BASIC  |  2007-02-24  |  217b  |  10 lines
  1. 10 DATA 16,3,76,139,227,169,232,133,20,169,3,133,21
  2. 20 DATA 162,250,154,169,167,72,169,233,72,76,163,168
  3. 30 FOR J=52992 TO 53016:READ X:POKEJ,X
  4. 40 NEXT J
  5. 50 POKE 768,0:POKE 769,207
  6. 100 REM TEST PROGRAM
  7. 110 STOP
  8. 1000 PRINT "YOU GOOFED!"
  9. 1010 END
  10.